trajectory_module Module

common/refl/nrefj(mpnt)

Uses

- trajectory_data
- kind_module

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public,	parameter	::	max_num_trajectories	=	10000
type(Trajectory),	public,	target	::	trajectories(max_num_trajectories)

Subroutines

public subroutine init_trajectory()

Arguments

None

public subroutine view(tview, ispectr, nnz, ntet)

!writing trajectories into a file pintld=-dland(i)(dflf+dfrt)/2d0 pdec1=-pdecvdf

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	tview
integer,	intent(in)			::	ispectr
integer,	intent(in)			::	nnz
integer,	intent(in)			::	ntet

public subroutine tracing(traj, nmax, nb1, nb2, pabs)

Arguments

Type	Intent	Optional	Attributes		Name
class(Trajectory),	intent(inout)			::	traj
integer,	intent(inout)			::	nmax
integer,	intent(inout)			::	nb1
integer,	intent(inout)			::	nb2
real(kind=wp),	intent(in)			::	pabs